mob/npc
	Stacey
		New()
			tag = "NoBoot"
		icon = 'pc npc.dmi'
		icon_state = "f"
		var
			Staceyon
		density = 1
		Red=255
		Green=204
		Blue=204
/** Important - The higher "up" in this if-else list a phrase is, the higher priority it has...
	Since she will only react to ONE of these, make detailed combos at the top, generalities in
	the middle, and names (as a last resort) at the bottom.
	[src] = person who talked to her
**/
mob/npc/Stacey/ReactToSpeech(txt,src)
	spawn(lentext(txt))
		var/sleeptime=rand(10,20)
		var/staceytext =""
		var/turnstaceon // heh
		if (staceyon)
			if(FindOrderedText(txt,"lol"))
				staceytext=pick ("LOL!!?! you looser.","Laugh out loud? oh arnt you original!","Gads, I hate that phrase 'lol'")
			else if(FindOrderedText(txt,"stace","shut","up"))
				staceytext=pick ("Fine, remember you came to me.","How rude.")
				turnstaceon = 0
			else if(FindOrderedText(txt,"castle", "winds"))
				staceytext=pick ("What a great game.","splattergnome is the best man on the team.","I am so glad that splatty gave me artificial intelligence")
			else if(FindOrderedText(txt,"bad", "gnome"))
				staceytext=pick ("Bad splattergnome!","stop thatt now splatter.","Gah men.")
			else if(FindOrderedText(txt,"w00t"))
				staceytext=pick ("w00t? what are you l33t or something","Gah, stop using that!")
			else if(FindOrderedText(txt,"gym"))
				staceytext=pick ("me and Ben signed up for a cool gym in Halifax","Gyms are cool, mine has a swimming pool","Gyms are cool, but I dont like sweating. Especially when there are other women around")
			else if(FindOrderedText(txt,"sewer"))
				staceytext=pick ("Yeah, its warm and cozy.","do you like what I'v done with the place?")
			else if(FindOrderedText(txt,"halifax"))
				staceytext=pick ("The place where me and Ben hang","Its a cool place where you can do nothing because it sucks.")
			else if(FindOrderedText(txt,"bath"))
				staceytext=pick ("Oh a hot warm bath, the greatest thing in the world","Its nice to share a bath","I love relaxing in the bath smelling candles burn")
			else if(FindOrderedText(txt,"band"))
				staceytext=pick ("I like Eminem...","Incubus are sweet","I love sitting and listening to Audioslave")
			else if(FindOrderedText(txt,"movies"))
				staceytext=pick ("movies sure are cool, I like to watch films like 8 Mile. I love Eminem","Movies are sweet","the backseats of cinemas are great!")
			else if(FindOrderedText(txt,"german"))
				staceytext=pick ("Ben speaks quite good german","I got a B in German, much better then Maz's C","Germans... they sure make wierd movies")
			else if(FindOrderedText(txt,"ben" || "Ben")) // || = or
				staceytext=pick ("Ben is Maz...","Ben is cool, though Maz... well","Aww, Ben in that picture on the forum sleeping")
			else if(FindOrderedText(txt,"jon88"))
				staceytext=pick ("Who is Jon?","Oh, I keep on ignoring the poor man!","I wish Jon88 would kiss me.")
			else if(FindOrderedText(txt,"yes","you"))
				staceytext=pick ("yeah im Stace?","Hes cool, Ben mentioned him once","Id like to talk to him someday")
			else if(FindOrderedText(txt,"why","ignoring"|"ignore"))
				if(FindOrderedText(txt,"jon88" || "jon"))
					staceytext=pick ("Why am I ignoring jon? I dunno","Jon88's wierd","He bores me")
				else if(FindOrderedText(txt,"splattergnome" || "splatty"))
					staceytext=pick ("I don't think I've been ignoring splatty.","Because whenever I talk to him he kisses me","[src], I am not ignoring splattergnome.")
				else if(FindOrderedText(txt,"maz"))
					staceytext=pick ("Me, ignoring Maz???","Maz is cute, I'd never ignore him","I love Maz")
			else if(FindOrderedText(txt,"maz"))
				staceytext=pick ("Maz is cute","I like Maz, but I like splatty more.","I love Maz")
			else if(FindOrderedText(txt,"splattergnome"))
				staceytext=pick ("splatterwho?","Oh do you need a hanky?","splattergnome is german right?")
			else if(FindOrderedText(txt,"gazoot"))
				staceytext=pick ("the swedish guy?","Hes cool, Ben mentioned him once","Id like to talk to him someday")
			else if(FindOrderedText(txt,"stairs"))
				staceytext=pick ("oh yeah, i forgot about those","They dont count take another guess","I dont like you")
			else if(FindOrderedText(txt,"i","bored"))
				staceytext=pick ("are you bored?","You're bored","no boredom strikes!")
			else if(FindOrderedText(txt,"stace"))
				staceytext=pick ("Stace?","Yeah?","Yes?")
			else if(FindOrderedText(txt,"vocab"))
				staceytext=pick ("So what if I cant talk right","...","Yes?")
			else if(FindOrderedText(txt,"succe")) // try to avoid using this guys, its a mono-a-mono nickname
				if(src == "Maz")
					staceytext=pick ("Suc-dor!","Yeah babey?")
				else
					staceytext=pick ("oh no","Succe? whats that?")
			else if(FindOrderedText(txt,"how","are","you"))
				staceytext=pick ("Times are great. I love my little sewer","Im ok thanks [src], and you?")
			else if(FindOrderedText(txt,"hello"))
				staceytext=pick ("Hello, how did you happen to get down here","Hi")
			else if(FindOrderedText(txt,"usr"))
				staceytext=pick ("[usr] = usr","[src] = src")
			if(staceytext<>"")
				sleep(sleeptime)
				saynpc(staceytext)

		if (!staceyon)
			if(FindOrderedText(txt,"Stace"||"Stacey"))
				staceytext=pick ("Hiya [src].","Hey [src].","Welcome [src], to my humble abode.")
				staceyon = 1
			if(staceytext<>"")
				sleep(sleeptime)
				saynpc(staceytext)
		if (turnstaceon)
			staceyon = 0